﻿Public Class CBrokerPorvenir

    Private _strFAX_NUM As String
    Private _strBROKER_COD As String
    Private _blnEsEditableNuevo As Boolean

    Public Sub New()
        _strFAX_NUM = ""
        _strBROKER_COD = ""
        _blnEsEditableNuevo = False
    End Sub

    Public Sub New(ByVal Fax As String, ByVal Broker As String)
        _strFAX_NUM = Fax
        _strBROKER_COD = Broker
        _blnEsEditableNuevo = False
    End Sub

    Public Sub New(ByVal Fax As String, ByVal Broker As String, ByVal EditableNuevo As Boolean)
        _strFAX_NUM = Fax
        _strBROKER_COD = Broker
        _blnEsEditableNuevo = EditableNuevo
    End Sub

    Public Property FAX_NUM As String
        Get
            FAX_NUM = Me._strFAX_NUM
        End Get
        Set(value As String)
            Me._strFAX_NUM = value
        End Set
    End Property

    Public Property BROKER_COD As String
        Get
            BROKER_COD = Me._strBROKER_COD
        End Get
        Set(value As String)
            Me._strBROKER_COD = value
        End Set
    End Property

    Public Property EsEditableNuevo As Boolean
        Get
            EsEditableNuevo = Me._blnEsEditableNuevo
        End Get
        Set(value As Boolean)
            Me._blnEsEditableNuevo = value
        End Set
    End Property
End Class
